home *** CD-ROM | disk | FTP | other *** search
/ Postcard CD: Toronto / Postcard CD: Toronto (2004).iso / mac / stub.dxr / 00002.ls < prev    next >
Encoding:
Text File  |  2002-01-03  |  325 b   |  20 lines
  1. global Cpu, Ram, system, x1, y1, x2, y2, desk
  2.  
  3. on checkSystem
  4.   system = 0
  5.   new(xtra("budapi"))
  6.   Ram = baMemoryInfo("ram")
  7.   if Ram > 115770176 then
  8.     system = 1
  9.   end if
  10.   desk = (the desktopRectList)[1]
  11.   put desk.right
  12.   if desk.right < 800 then
  13.     go(5)
  14.   else
  15.     go(1, "Intro")
  16.   end if
  17.   put system
  18.   put Ram
  19. end
  20.